|
CATIA V5 Programmierung : Balloon links entfernen
NyariG am 19.08.2015 um 08:28 Uhr (1)
Was ich probiert:1)Makro aufnahmen während Isolirung...2)drawingView1.Texts.Item(1).Isolate3)Code:For j = 1 To drawingView1.Texts.Countselection1.Add drawingView1.Texts.Item(j)NextAnwendung = "Isolate"CATIA.StartCommand Anwendung4)Copy-Paste5)Neue Balloon erstellen.Leaderposition kann ich nicht abfragen. Code:Dim MyText2 As DrawingTextSet MyText2 = drawingView1.Texts.Add("ComplexText", 0#, 0#) MyText2.AnchorPosition = 21 MyText2.FrameType = catCircleDim MyLeader As DrawingLeaderSet MyLeader = MyText2.Leade ...
| | In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Balloon links entfernen
NyariG am 19.08.2015 um 12:22 Uhr (1)
Hallo,Ich habe eine ISO Ansicht.Mittels diese Befehl:Code:Anwendung = "Balloon" & " " & "generation"CATIA.StartCommand Anwendungerstelle ich den Balloons und nach der Erstellung benenne ich das um.Das funktioniert gut. Aber jedes Balloon hat ein Attribute link, das muss man momentan per Hand isolieren. Das möchte ich auch automatisieren.GrüßGergö----Englisch geht leider nicht.[Diese Nachricht wurde von NyariG am 19. Aug. 2015 editiert.]
| | In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Balloon links entfernen
NyariG am 20.08.2015 um 06:54 Uhr (1)
HalloBei mir funktioniert leider nicht.Kannst du bitte anschauen:Code:Private Sub CommandButton8_Click()Set drawingDocument1 = CATIA.ActiveDocumentSet drawingSheets1 = drawingDocument1.SheetsSet drawingSheet1 = drawingSheets1.ActiveSheetSet drawingViews1 = drawingSheet1.ViewsSet drawingView1 = drawingViews1.ActiveViewSet DrawTexts1 = drawingView1.TextsDim selection1 As SelectionSet selection1 = drawingDocument1.Selectionselection1.ClearFor j = 1 To DrawTexts1.Countselection1.Add DrawTexts1.Item(j)NextDim a ...
| | In das Form CATIA V5 Programmierung wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
